home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 14
/
CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso
/
System
/
CDsupport
/
IDer
/
Routines
/
ProcessFlags.s
< prev
next >
Wrap
Text File
|
1997-02-18
|
646b
|
31 lines
MODE_ONE Equ 0
MODE_ALL Equ 1
MODE_TWO Equ 2
ProcessFlags: Clr.L _Mode ;clear all flag settings
Move.L _Flags(PC),A0 ;were any flags specified
Cmp.L #0,A0
Beq.S .ProcessDone
.ProcessLoop Move.B (A0)+,D0 ;get a flag
Beq.S .ProcessDone
Bsr.S ChangeCase
Cmp.B #'A',D0 ;is it ALL
Bne.S .notAll
Move.B #MODE_ALL,_Mode ;set the approprate bit
.notAll
Cmp.B #'T',D0 ;is it TWO
Bne.S .notTwo
Move.B #MODE_TWO,_Mode ;set the approprate bit
.notTwo
Cmp.B #'I',D0 ;is it INSENSITIVE
Seq _Insensitive ;set the approprate bit
Cmp.B #'Q',D0 ;is it QUOTE
Seq _Quote ;set the approprate bit
Bra.S .ProcessLoop
.ProcessDone Rts